Chip 1998 September/CHIP Eylül 1998.iso/demolar/lokman/DISK1/_SETUP.2/Group1/Tarihdll.dll/0/RCDATA/TKURUMFORM/TKURUMFORM.txt

Text File | 1998-07-24 | 44KB | 1,596 lines

object kurumForm: TkurumForm
  Left = 0
  Top = 9
  Width = 642
  Height = 437
  ActiveControl = EditAD
  Caption = 'CAR� KAYIT KARTI'
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Label16: TLabel
    Left = 14
    Top = 242
    Width = 70
    Height = 12
    Caption = 'KAYIT &TAR�H�'
    FocusControl = EditTARIH
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 634
    Height = 410
    HelpContext = 301
    Align = alClient
    BevelInner = bvLowered
    BorderWidth = 1
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object ScrollBox: TScrollBox
      Left = 3
      Top = 3
      Width = 628
      Height = 404
      HorzScrollBar.Margin = 6
      VertScrollBar.Margin = 6
      Align = alClient
      BorderStyle = bsNone
      Color = clSilver
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      TabOrder = 0
      object Label1: TLabel
        Left = 243
        Top = 9
        Width = 58
        Height = 14
        Caption = 'CAR� &KODU'
        FocusControl = EditKOD
      end
      object Label2: TLabel
        Left = 1
        Top = 8
        Width = 47
        Height = 14
        Caption = '&CAR� ADI'
        FocusControl = EditAD
      end
      object Label3: TLabel
        Left = 14
        Top = 37
        Width = 35
        Height = 14
        Caption = '&ADRES'
        FocusControl = EditADR
      end
      object Label6: TLabel
        Left = 14
        Top = 110
        Width = 31
        Height = 14
        Caption = '&�LG�L�'
        FocusControl = EditILGILI
      end
      object Label7: TLabel
        Left = 256
        Top = 86
        Width = 47
        Height = 14
        Caption = 'T&ELEFON'
        FocusControl = EditTLF
      end
      object Label8: TLabel
        Left = 282
        Top = 109
        Width = 21
        Height = 14
        Caption = 'FA&X'
        FocusControl = EditFAX
      end
      object Label9: TLabel
        Left = 225
        Top = 38
        Width = 76
        Height = 14
        Caption = 'VERG� &DA�RES�'
        FocusControl = EditVERGIDAIRE
      end
      object Label10: TLabel
        Left = 252
        Top = 59
        Width = 50
        Height = 14
        Caption = 'VER&G� NO'
        FocusControl = EditVERGINO
      end
      object Label11: TLabel
        Left = 439
        Top = 40
        Width = 70
        Height = 13
        Caption = 'KAYIT &TAR�H�'
        FocusControl = EditTARIH
      end
      object Label29: TLabel
        Left = 425
        Top = 69
        Width = 169
        Height = 30
        AutoSize = False
        Caption = 'Faturada Sondan Yuvarlanacak  &Hane Say�s�'
        FocusControl = EditFATYUVAR
        WordWrap = True
      end
      object LabelBORC: TLabel
        Left = 11
        Top = 268
        Width = 25
        Height = 14
        Caption = 'Bor�'
        FocusControl = EditBORC
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object LabelALACAK: TLabel
        Left = 1
        Top = 290
        Width = 36
        Height = 14
        Caption = 'Alacak'
        FocusControl = EditALACAK
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object Label32: TLabel
        Left = 5
        Top = 331
        Width = 44
        Height = 14
        Caption = '&NOTLAR'
        FocusControl = DBMemo1
      end
      object SpeedBtnTakvim: TSpeedButton
        Left = 575
        Top = 38
        Width = 22
        Height = 21
        Hint = 'Takvime Bak�n'
        Glyph.Data = {
          4E010000424D4E01000000000000760000002800000012000000120000000100
          040000000000D800000000000000000000000000000010000000000000000000
          BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333330000003333333333333333330000003338888888888888330000003304
          0404404040483300000033FFFFFFFFFFFF483300000033FFFFFFFFFFFF483300
          000033FF000F0007FF483300000033FFF0FF7F70FF483300000033FFF0FFFFF0
          FF483300000033FFF0FF0007FF483300000033FF00FF0FFFFF483300000033FF
          F0FF0000FF483300000033FFFFFFFFFFFF483300000033FFFFFFFFFFFF483300
          000033F7777777777F4833000000330000000000003333000000333333333333
          333333000000333333333333333333000000}
        ParentShowHint = False
        ShowHint = True
        Spacing = 3
        OnClick = SpeedBtnTakvimClick
      end
      object LabelKALAN: TLabel
        Left = 1
        Top = 308
        Width = 148
        Height = 16
        Alignment = taRightJustify
        AutoSize = False
        Color = clNavy
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Visible = False
      end
      object PanelORT: TPanel
        Left = 2
        Top = 145
        Width = 148
        Height = 120
        BevelOuter = bvNone
        Color = clSilver
        TabOrder = 13
        Visible = False
        object LabelIlac: TLabel
          Left = 4
          Top = 18
          Width = 95
          Height = 15
          Alignment = taRightJustify
          AutoSize = False
          Caption = '�LA�LARDA %'
          FocusControl = EditILACLARDAKURUM
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object LabelOzel: TLabel
          Left = 1
          Top = 39
          Width = 98
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = '�ZEL KATILIMLI %'
          FocusControl = EditOZELKATILIMKURUM
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object LabelBeraber: TLabel
          Left = 4
          Top = 60
          Width = 95
          Height = 14
          Alignment = taRightJustify
          AutoSize = False
          Caption = '�LA� BERABER� %'
          FocusControl = EditILACBERABERKURUM
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object LabelKRIN: TLabel
          Left = 84
          Top = 0
          Width = 62
          Height = 14
          Alignment = taRightJustify
          Caption = 'KURUMA'
          FocusControl = EditILACBERABERKURUM
        end
        object LabelIthal: TLabel
          Left = 4
          Top = 81
          Width = 95
          Height = 14
          Alignment = taRightJustify
          AutoSize = False
          Caption = '�THAL �LA�LAR%'
          FocusControl = EditILACBERABERKURUM
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object LabelRithal: TLabel
          Left = 2
          Top = 102
          Width = 103
          Height = 14
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'RAP.�THAL �LA�%'
          FocusControl = EditILACBERABERKURUM
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object EditILACLARDAKURUM: TDBEdit
          Left = 106
          Top = 14
          Width = 41
          Height = 22
          DataField = 'ILACLARDAKURUM'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 0
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditOZELKATILIMKURUM: TDBEdit
          Left = 106
          Top = 35
          Width = 41
          Height = 22
          DataField = 'OZELKATILIMKURUM'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 1
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditILACBERABERKURUM: TDBEdit
          Left = 106
          Top = 56
          Width = 41
          Height = 22
          DataField = 'ILACBERABERKURUM'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 2
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditITHALKRM: TDBEdit
          Left = 106
          Top = 77
          Width = 41
          Height = 22
          DataField = 'ITHALKURUM'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 3
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditIHLRAPKURUM: TDBEdit
          Left = 106
          Top = 98
          Width = 41
          Height = 22
          DataField = 'IHLRAPKURUM'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 4
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
      end
      object EditKOD: TDBEdit
        Left = 303
        Top = 4
        Width = 89
        Height = 22
        DataField = 'KOD'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 1
      end
      object EditAD: TDBEdit
        Left = 52
        Top = 4
        Width = 184
        Height = 22
        DataField = 'AD'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 0
      end
      object EditADR: TDBEdit
        Left = 52
        Top = 31
        Width = 155
        Height = 22
        DataField = 'ADR1'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 3
      end
      object EditADR2: TDBEdit
        Left = 52
        Top = 52
        Width = 155
        Height = 22
        DataField = 'ADR2'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 4
      end
      object EditADR3: TDBEdit
        Left = 52
        Top = 73
        Width = 155
        Height = 22
        DataField = 'ADR3'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 5
      end
      object EditILGILI: TDBEdit
        Left = 49
        Top = 106
        Width = 180
        Height = 22
        DataField = 'ILGILI'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 10
      end
      object EditTLF: TDBEdit
        Left = 307
        Top = 81
        Width = 94
        Height = 22
        DataField = 'TLF'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 11
      end
      object EditFAX: TDBEdit
        Left = 307
        Top = 104
        Width = 88
        Height = 22
        DataField = 'FAX'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 12
      end
      object EditVERGIDAIRE: TDBEdit
        Left = 303
        Top = 33
        Width = 109
        Height = 22
        DataField = 'VERGIDAIRE'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 6
      end
      object EditVERGINO: TDBEdit
        Left = 303
        Top = 55
        Width = 91
        Height = 22
        DataField = 'VERGINO'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 7
      end
      object EditTARIH: TDBEdit
        Left = 512
        Top = 36
        Width = 60
        Height = 22
        DataField = 'TARIH'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 8
      end
      object EditFATYUVAR: TDBEdit
        Left = 512
        Top = 88
        Width = 50
        Height = 22
        DataField = 'FATYUVAR'
        DataSource = KURUMSRC
        MaxLength = 0
        TabOrder = 9
      end
      object EditBORC: TDBEdit
        Left = 37
        Top = 265
        Width = 113
        Height = 22
        Color = clBlack
        DataField = 'BORC'
        DataSource = KURUMSRC
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        MaxLength = 0
        ParentFont = False
        ReadOnly = True
        TabOrder = 16
        Visible = False
      end
      object EditALACAK: TDBEdit
        Left = 37
        Top = 286
        Width = 113
        Height = 22
        Color = clRed
        DataField = 'ALACAK'
        DataSource = KURUMSRC
        MaxLength = 0
        ReadOnly = True
        TabOrder = 17
        Visible = False
      end
      object DBRadioGroup2: TDBRadioGroup
        Left = 423
        Top = 1
        Width = 190
        Height = 34
        Caption = 'CAR� T�P�'
        Color = clNavy
        Columns = 3
        Ctl3D = True
        DataField = 'CARITIPI'
        DataSource = KURUMSRC
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        Items.Strings = (
          'Kuru&m'
          'Dep&o'
          'Di�e&r')
        ParentColor = False
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 2
        Values.Strings = (
          'K'
          'D'
          'R')
        OnClick = DBRadioGroup2Click
      end
      object DBMemo1: TDBMemo
        Left = 53
        Top = 327
        Width = 480
        Height = 68
        DataField = 'KRMNOT'
        DataSource = KURUMSRC
        ScrollBars = ssBoth
        TabOrder = 15
      end
      object BitBtnSakla: TBitBtn
        Left = 543
        Top = 321
        Width = 76
        Height = 27
        Caption = '&Sakla'
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 18
        OnClick = BitBtnSaklaClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
          000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
          00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
          F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
          0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
          FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
          FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
          0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
          00333377737FFFFF7733333033000000033333373377777773330000}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
      object BitBtnIptal: TBitBtn
        Left = 543
        Top = 361
        Width = 76
        Height = 27
        Caption = '&Vazge�'
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 19
        OnClick = BitBtnIptalClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333333333333333333333333333333FFF33FF333FFF339993370733
          999333777FF37FF377733339993000399933333777F777F77733333399970799
          93333333777F7377733333333999399933333333377737773333333333990993
          3333333333737F73333333333331013333333333333777FF3333333333910193
          333333333337773FF3333333399000993333333337377737FF33333399900099
          93333333773777377FF333399930003999333337773777F777FF339993370733
          9993337773337333777333333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333333333}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
      object PanelSAKLA: TPanel
        Left = 151
        Top = 131
        Width = 470
        Height = 187
        BevelOuter = bvNone
        Color = clSilver
        TabOrder = 14
        Visible = False
        object Label19: TLabel
          Left = 1
          Top = 33
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACLARDACALISAN
        end
        object Label20: TLabel
          Left = 1
          Top = 55
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditOZELKATILIMCALISAN
        end
        object Label21: TLabel
          Left = 1
          Top = 77
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABERCALISAN
        end
        object Label22: TLabel
          Left = 53
          Top = 35
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACLARDARAPYAT
        end
        object Label4: TLabel
          Left = 53
          Top = 57
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditOZELKATILIMRAPYAT
        end
        object Label5: TLabel
          Left = 53
          Top = 77
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABERRAPYAT
        end
        object Label15: TLabel
          Left = 107
          Top = 33
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACLARDAEMEKLI
        end
        object Label23: TLabel
          Left = 107
          Top = 53
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditOZELKATILIMEMEKLI
        end
        object Label24: TLabel
          Left = 107
          Top = 74
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABEREMEKLI
        end
        object Label13: TLabel
          Left = 6
          Top = 14
          Width = 47
          Height = 14
          Caption = '�ALI�AN'
        end
        object Label14: TLabel
          Left = 169
          Top = 14
          Width = 45
          Height = 14
          Caption = 'RAP./YT.'
        end
        object Label25: TLabel
          Left = 119
          Top = 14
          Width = 39
          Height = 12
          Caption = 'EMEKL�'
        end
        object Label26: TLabel
          Left = 216
          Top = 17
          Width = 42
          Height = 14
          Caption = '&1.Ba�l�k'
          FocusControl = EditETIKET
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label27: TLabel
          Left = 216
          Top = 43
          Width = 42
          Height = 14
          Caption = '&2.Ba�l�k'
          FocusControl = EditETIKET2
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label28: TLabel
          Left = 216
          Top = 68
          Width = 42
          Height = 14
          Caption = '&3.Ba�l�k'
          FocusControl = EditETIKET3
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label30: TLabel
          Left = 229
          Top = -1
          Width = 130
          Height = 14
          Caption = 'Re�ete Arkas� Ba�l�klar�'
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label12: TLabel
          Left = 370
          Top = -1
          Width = 101
          Height = 14
          Caption = 'S�zle�me Ba�.Trh'
          FocusControl = EditTARIH
        end
        object SpeedButtonBAS: TSpeedButton
          Left = 435
          Top = 15
          Width = 20
          Height = 20
          Hint = 'Takvime Bak�n'
          Glyph.Data = {
            4E010000424D4E01000000000000760000002800000012000000120000000100
            040000000000D800000000000000000000000000000010000000000000000000
            BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            3333330000003333333333333333330000003338888888888888330000003304
            0404404040483300000033FFFFFFFFFFFF483300000033FFFFFFFFFFFF483300
            000033FF000F0007FF483300000033FFF0FF7F70FF483300000033FFF0FFFFF0
            FF483300000033FFF0FF0007FF483300000033FF00FF0FFFFF483300000033FF
            F0FF0000FF483300000033FFFFFFFFFFFF483300000033FFFFFFFFFFFF483300
            000033F7777777777F4833000000330000000000003333000000333333333333
            333333000000333333333333333333000000}
          ParentShowHint = False
          ShowHint = True
          Spacing = 3
          OnClick = SpeedBtnTakvimClick
        end
        object Label17: TLabel
          Left = 370
          Top = 49
          Width = 98
          Height = 14
          Caption = 'S�zle�me Bit. Trh'
          FocusControl = EditTARIH
        end
        object SpeedButtonBIT: TSpeedButton
          Left = 436
          Top = 65
          Width = 20
          Height = 20
          Hint = 'Takvime Bak�n'
          Glyph.Data = {
            4E010000424D4E01000000000000760000002800000012000000120000000100
            040000000000D800000000000000000000000000000010000000000000000000
            BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            3333330000003333333333333333330000003338888888888888330000003304
            0404404040483300000033FFFFFFFFFFFF483300000033FFFFFFFFFFFF483300
            000033FF000F0007FF483300000033FFF0FF7F70FF483300000033FFF0FFFFF0
            FF483300000033FFF0FF0007FF483300000033FF00FF0FFFFF483300000033FF
            F0FF0000FF483300000033FFFFFFFFFFFF483300000033FFFFFFFFFFFF483300
            000033F7777777777F4833000000330000000000003333000000333333333333
            333333000000333333333333333333000000}
          ParentShowHint = False
          ShowHint = True
          Spacing = 3
          OnClick = SpeedBtnTakvimClick
        end
        object Label18: TLabel
          Left = 216
          Top = 94
          Width = 42
          Height = 14
          Caption = '&4.Ba�l�k'
          FocusControl = EditETIKET4
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label31: TLabel
          Left = 216
          Top = 119
          Width = 42
          Height = 14
          Caption = '&5.Ba�l�k'
          FocusControl = EditETIKET5
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label33: TLabel
          Left = 216
          Top = 145
          Width = 42
          Height = 14
          Caption = '&6.Ba�l�k'
          FocusControl = EditETIKET6
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label35: TLabel
          Left = 69
          Top = 14
          Width = 31
          Height = 14
          Hint = '�rne�in Ba�-kurda �al��an/Raporlu i�in Kullan�labilir'
          Caption = 'D��ER'
          ParentShowHint = False
          ShowHint = True
        end
        object Label36: TLabel
          Left = 160
          Top = 33
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACLARDAEMEKLI
        end
        object Label37: TLabel
          Left = 160
          Top = 53
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditOZELKATILIMEMEKLI
        end
        object Label38: TLabel
          Left = 160
          Top = 74
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABEREMEKLI
        end
        object Label34: TLabel
          Left = 370
          Top = 87
          Width = 91
          Height = 28
          AutoSize = False
          Caption = 'Yeniden Fiyat De�erlendirme'
          FocusControl = DBRadioGroup1
          WordWrap = True
        end
        object Label40: TLabel
          Left = 1
          Top = 98
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABERCALISAN
        end
        object Label41: TLabel
          Left = 53
          Top = 98
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABERRAPYAT
        end
        object Label42: TLabel
          Left = 107
          Top = 95
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABEREMEKLI
        end
        object Label43: TLabel
          Left = 160
          Top = 95
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABEREMEKLI
        end
        object Label39: TLabel
          Left = 60
          Top = 0
          Width = 53
          Height = 14
          Hint = '�rne�in Ba�-kurda �al��an/Raporlu i�in Kullan�labilir'
          Caption = '(�.RP/YT.)'
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
        end
        object Label44: TLabel
          Left = 166
          Top = 0
          Width = 51
          Height = 14
          Hint = '�rne�in Ba�-kurda �al��an/Raporlu i�in Kullan�labilir'
          Caption = '(E.RP/YT.)'
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
        end
        object Label46: TLabel
          Left = 1
          Top = 119
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABERCALISAN
        end
        object Label47: TLabel
          Left = 53
          Top = 119
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABERRAPYAT
        end
        object Label48: TLabel
          Left = 107
          Top = 116
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABEREMEKLI
        end
        object Label49: TLabel
          Left = 160
          Top = 116
          Width = 9
          Height = 12
          Caption = '%'
          FocusControl = EditILACBERABEREMEKLI
        end
        object DBRadioGroup1: TDBRadioGroup
          Left = 369
          Top = 116
          Width = 95
          Height = 46
          DataField = 'YDEGER'
          DataSource = KURUMSRC
          Items.Strings = (
            'Re�ete Trh.'
            'Son Fyt.Trh.')
          TabOrder = 29
          Values.Strings = (
            'R'
            'S')
        end
        object DBRadioGroup3: TDBRadioGroup
          Left = 7
          Top = 138
          Width = 191
          Height = 45
          Caption = 'Hst. Kat.Pay�n�n Hesaplanmas�'
          DataField = 'HSP_ISKON'
          DataSource = KURUMSRC
          Items.Strings = (
            'Kurum �ndiriminden Sonra'
            'Kurum �ndiriminden �nce')
          TabOrder = 20
          Values.Strings = (
            '0'
            '1')
        end
        object EditETIKET: TDBEdit
          Left = 258
          Top = 13
          Width = 107
          Height = 22
          DataField = 'ETIKET1'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 21
        end
        object EditETIKET2: TDBEdit
          Left = 258
          Top = 38
          Width = 107
          Height = 22
          DataField = 'ETIKET2'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 22
        end
        object EditETIKET3: TDBEdit
          Left = 258
          Top = 64
          Width = 107
          Height = 22
          DataField = 'ETIKET3'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 23
        end
        object EditILACLARDACALISAN: TDBEdit
          Left = 10
          Top = 28
          Width = 41
          Height = 22
          DataField = 'ILACLARDACALISAN'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 0
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditOZELKATILIMCALISAN: TDBEdit
          Left = 10
          Top = 49
          Width = 41
          Height = 22
          DataField = 'OZELKATILIMCALISAN'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 1
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditILACBERABERCALISAN: TDBEdit
          Left = 10
          Top = 70
          Width = 41
          Height = 22
          DataField = 'ILACBERABERCALISAN'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 2
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditILACLARDARAPYAT: TDBEdit
          Left = 170
          Top = 28
          Width = 41
          Height = 22
          DataField = 'ILACLARDARAPYAT'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 15
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditOZELKATILIMRAPYAT: TDBEdit
          Left = 170
          Top = 49
          Width = 41
          Height = 22
          DataField = 'OZELKATILIMRAPYAT'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 16
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditILACBERABERRAPYAT: TDBEdit
          Left = 170
          Top = 70
          Width = 41
          Height = 22
          DataField = 'ILACBERABERRAPYAT'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 17
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditILACLARDAEMEKLI: TDBEdit
          Left = 117
          Top = 28
          Width = 41
          Height = 22
          DataField = 'ILACLARDAEMEKLI'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 10
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditOZELKATILIMEMEKLI: TDBEdit
          Left = 117
          Top = 49
          Width = 41
          Height = 22
          DataField = 'OZELKATILIMEMEKLI'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 11
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditILACBERABEREMEKLI: TDBEdit
          Left = 117
          Top = 70
          Width = 41
          Height = 22
          DataField = 'ILACBERABEREMEKLI'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 12
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object DBEdit1: TDBEdit
          Left = 369
          Top = 13
          Width = 60
          Height = 22
          DataField = 'SOZTRHBAS'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 27
        end
        object DBEdit2: TDBEdit
          Left = 370
          Top = 64
          Width = 60
          Height = 22
          DataField = 'SOZTRHBIT'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 28
        end
        object EditETIKET4: TDBEdit
          Left = 258
          Top = 89
          Width = 107
          Height = 22
          DataField = 'ETIKET4'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 24
        end
        object EditETIKET5: TDBEdit
          Left = 258
          Top = 115
          Width = 107
          Height = 22
          DataField = 'ETIKET5'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 25
        end
        object EditETIKET6: TDBEdit
          Left = 258
          Top = 140
          Width = 107
          Height = 22
          DataField = 'ETIKET6'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 26
        end
        object EditILACLARDADIGER: TDBEdit
          Left = 64
          Top = 28
          Width = 41
          Height = 22
          DataField = 'ILACLARDADIGER'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 5
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditOZELKATILIMDIGER: TDBEdit
          Left = 64
          Top = 49
          Width = 41
          Height = 22
          DataField = 'OZELKATILIMDIGER'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 6
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditILACBERABERDIGER: TDBEdit
          Left = 64
          Top = 70
          Width = 41
          Height = 22
          DataField = 'ILACBERABERDIGER'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 7
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditITHALCALIS: TDBEdit
          Left = 10
          Top = 91
          Width = 41
          Height = 22
          DataField = 'ITHALCALISAN'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 3
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditITHALRAPY: TDBEdit
          Left = 170
          Top = 91
          Width = 41
          Height = 22
          DataField = 'ITHALRAPYAT'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 18
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditITHALEMEKLI: TDBEdit
          Left = 117
          Top = 91
          Width = 41
          Height = 22
          DataField = 'ITHALEMEKLI'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 13
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditITHALDIGER: TDBEdit
          Left = 64
          Top = 91
          Width = 41
          Height = 22
          DataField = 'ITHALDIGER'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 8
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditIHLRAPCALISAN: TDBEdit
          Left = 10
          Top = 112
          Width = 41
          Height = 22
          DataField = 'IHLRAPCALISAN'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 4
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditITHALRAPYAT: TDBEdit
          Left = 170
          Top = 112
          Width = 41
          Height = 22
          DataField = 'IHLRAPRAPYAT'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 19
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditIHLRAPEMEKLI: TDBEdit
          Left = 117
          Top = 112
          Width = 41
          Height = 22
          DataField = 'IHLRAPEMEKLI'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 14
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
        object EditIHLRAPDIGER: TDBEdit
          Left = 64
          Top = 112
          Width = 41
          Height = 22
          DataField = 'IHLRAPDIGER'
          DataSource = KURUMSRC
          MaxLength = 0
          TabOrder = 9
          OnKeyPress = EditILACLARDAKURUMKeyPress
        end
      end
    end
  end
  object KURUMSRC: TDataSource
    DataSet = KURUMTable
    Left = 205
    Top = 85
  end
  object KURUMTable: TTable
    DatabaseName = 'ECZ'
    TableName = 'krmlar.db'
    Left = 232
    Top = 117
    object KURUMTableKOD: TStringField
      FieldName = 'KOD'
      Size = 11
    end
    object KURUMTableAD: TStringField
      FieldName = 'AD'
      Size = 36
    end
    object KURUMTableADR1: TStringField
      FieldName = 'ADR1'
      Size = 31
    end
    object KURUMTableADR2: TStringField
      FieldName = 'ADR2'
      Size = 31
    end
    object KURUMTableADR3: TStringField
      FieldName = 'ADR3'
      Size = 31
    end
    object KURUMTableILGILI: TStringField
      FieldName = 'ILGILI'
      Size = 36
    end
    object KURUMTableTLF: TStringField
      FieldName = 'TLF'
      Size = 15
    end
    object KURUMTableFAX: TStringField
      FieldName = 'FAX'
      Size = 15
    end
    object KURUMTableVERGIDAIRE: TStringField
      FieldName = 'VERGIDAIRE'
      Size = 17
    end
    object KURUMTableVERGINO: TStringField
      FieldName = 'VERGINO'
      Size = 13
    end
    object KURUMTableTARIH: TDateField
      FieldName = 'TARIH'
    end
    object KURUMTableETIKET1: TStringField
      FieldName = 'ETIKET1'
      Size = 17
    end
    object KURUMTableETIKET2: TStringField
      FieldName = 'ETIKET2'
      Size = 17
    end
    object KURUMTableETIKET3: TStringField
      FieldName = 'ETIKET3'
      Size = 17
    end
    object KURUMTableYDEGER: TStringField
      FieldName = 'YDEGER'
      Size = 1
    end
    object KURUMTableILACLARDAKURUM: TFloatField
      FieldName = 'ILACLARDAKURUM'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableOZELKATILIMKURUM: TFloatField
      FieldName = 'OZELKATILIMKURUM'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableILACBERABERKURUM: TFloatField
      FieldName = 'ILACBERABERKURUM'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableILACLARDACALISAN: TFloatField
      FieldName = 'ILACLARDACALISAN'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableOZELKATILIMCALISAN: TFloatField
      FieldName = 'OZELKATILIMCALISAN'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableILACBERABERCALISAN: TFloatField
      FieldName = 'ILACBERABERCALISAN'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableILACLARDARAPYAT: TFloatField
      FieldName = 'ILACLARDARAPYAT'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableOZELKATILIMRAPYAT: TFloatField
      FieldName = 'OZELKATILIMRAPYAT'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableILACBERABERRAPYAT: TFloatField
      FieldName = 'ILACBERABERRAPYAT'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableILACLARDAEMEKLI: TFloatField
      FieldName = 'ILACLARDAEMEKLI'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableOZELKATILIMEMEKLI: TFloatField
      FieldName = 'OZELKATILIMEMEKLI'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableILACBERABEREMEKLI: TFloatField
      FieldName = 'ILACBERABEREMEKLI'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableCARITIPI: TStringField
      FieldName = 'CARITIPI'
      Size = 1
    end
    object KURUMTableFATYUVAR: TIntegerField
      FieldName = 'FATYUVAR'
    end
    object KURUMTableBORC: TCurrencyField
      FieldName = 'BORC'
    end
    object KURUMTableALACAK: TCurrencyField
      FieldName = 'ALACAK'
    end
    object KURUMTableKRMNOT: TMemoField
      FieldName = 'KRMNOT'
      BlobType = ftMemo
      Size = 1
    end
    object KURUMTableSOZTRHBAS: TDateField
      FieldName = 'SOZTRHBAS'
    end
    object KURUMTableSOZTRHBIT: TDateField
      FieldName = 'SOZTRHBIT'
    end
    object KURUMTableHSP_ISKON: TStringField
      FieldName = 'HSP_ISKON'
      Size = 1
    end
    object KURUMTableETIKET4: TStringField
      FieldName = 'ETIKET4'
      Size = 17
    end
    object KURUMTableETIKET5: TStringField
      FieldName = 'ETIKET5'
      Size = 17
    end
    object KURUMTableETIKET6: TStringField
      FieldName = 'ETIKET6'
      Size = 17
    end
    object KURUMTableILACLARDADIGER: TFloatField
      FieldName = 'ILACLARDADIGER'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableOZELKATILIMDIGER: TFloatField
      FieldName = 'OZELKATILIMDIGER'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableILACBERABERDIGER: TFloatField
      FieldName = 'ILACBERABERDIGER'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableITHALKURUM: TFloatField
      FieldName = 'ITHALKURUM'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableITHALCALISAN: TFloatField
      FieldName = 'ITHALCALISAN'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableITHALRAPYAT: TFloatField
      FieldName = 'ITHALRAPYAT'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableITHALEMEKLI: TFloatField
      FieldName = 'ITHALEMEKLI'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableITHALDIGER: TFloatField
      FieldName = 'ITHALDIGER'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableIHLRAPKURUM: TFloatField
      FieldName = 'IHLRAPKURUM'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableIHLRAPCALISAN: TFloatField
      FieldName = 'IHLRAPCALISAN'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableIHLRAPEMEKLI: TFloatField
      FieldName = 'IHLRAPEMEKLI'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableIHLRAPRAPYAT: TFloatField
      FieldName = 'IHLRAPRAPYAT'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
    object KURUMTableIHLRAPDIGER: TFloatField
      FieldName = 'IHLRAPDIGER'
      OnSetText = KURUMTableILACLARDAKURUMSetText
      DisplayFormat = '0.00'
      EditFormat = '0.00'
    end
  end
end